home *** CD-ROM | disk | FTP | other *** search
/ Celestin Apprentice 5 / Apprentice-Release5.iso / Environments / PowerMacOberon feb96 / System / SortDemo.Obj < prev    next >
Encoding:
Text File  |  1996-01-25  |  10.8 KB  |  25 lines  |  [TEXT/.Ob4]
  1. ¯6©     ˇ»8÷ë8-·éSortDemoÇ¡ÿ+/ä◊å€Blb5®ÉBubbleÿHeap+Insert/MinSearchOpenäRandomize€QuickWorstOrderåQuick◊RecallBReverseOrderlShellbSmooth5Ñ$0Ö$ `<Oberon;‚ÜDisplay$ !Texts;‚WêFonts;ı‰ƒViewers;˜ê
  2. MenuViewers$ÀúcTextFrames$…¢ãFiles;‚WêInputÜ ˇ√ˇc˛fiˇˇ¸K˝ı    ˝Ã˚/˝K¯8&¸â¸ë¸≠ ¸É¸}¸G¸<¸5¸-¯1áSortDemo.SmoothSortDemo.HeapSortDemo.QuickSortDemo.ShellSortDemo.InsertSortDemo.MinSearchSortDemo.BubbleSystem.Close  System.Grow SortDemo sec swaps,  comparisons, : à|¶øˇ‡êî!ˇà;·8êA;ƒ;•;Ü;g;H;)8ˇˇ¸8Ä|â¶ÄÉÄ£êáÑÉîßÄ£Bˇêáêß©@,ò@ ´øxÿ©?©_ }iRXÿ@¯;x©ü
  3. `/ò@˝ ´ü
  4. X–®
  5. ®ü|£"(|ò–@‰;X/@˘0/ö@˝(8~8ù8º8€8˙9ÄBˇ–HÄAÄHÄ!|¶ªˇ‡O‡ |¶ø!ˇ‰êî!ˇò;·8êA;√; û®~û®û
  6. û®æ û®fiÄBˇÃHÄAû®fi 0Êˇj1ˇ˛}p,ù@‰;†û©>âÍûû©^
  7. ©~}äZ0lˇÏ0ɡj3dû8~8Ä8º8€8‡ñ9ñ9 Kˇ˛9;@ñûÉ>3Zˇˇû8~8Ä|º“ô ∫ñWF<|˘2Æ|€:8‡99 Kˇ˝ı/@˙ˇƒÄ8Ä!|¶ª!ˇ‰O‡ |¶æ°ˇ‘êî!ˇà;·8êA;√;§;Öû®~û®û
  8. û®æ û®fiÄBˇÃKˇ˛≠ÄAû© 1(ˇj1Iˇ˛}[p/õ@¸;`û©~K⁄ûû©û
  9. ®~|å0§ˇÏ0≈ˇj3&ÍûIJá ΩñW®<}'BÆ~˘J~⁄‚ûÅ^ä ºñWã<}äZÆ~πbû8~8Ä8∏8’8‡99 Kˇ¸Ÿû8~8Ä8∂8◊8‡99 Kˇ¸µû8~8Ä8∏8◊8‡99 Kˇ¸ëû8~8Ä8∂8’8‡99 Kˇ¸mÄHÄ!|¶∫°ˇ‘O‡ |¶æ°ˇ‘êî!ˇp;·8êA;√;§;Ö;f;G:†íøíø ,ù@Ê\/A˙@û®~û®û
  10. |Ñ‚û®æ 8⁄û®˛99 ÄBˇ–HÄAû≥~
  11. û≥^C‡–/úA˛Hû®~û®û
  12. û®æ û®fiû®˛û©
  13. }‚9 ÄBˇ–Kˇ˚ŸÄAû©>±?û©^ ±_≥û©~}ã–±üû≥~
  14. û≥^û®~ 0ɡj0§ˇ˛|∂p,ñ@‰:¿û®fi&≤ûû®˛
  15. ©}'B1IˇÏ1jˇj3 8 8Äû®æû®fi
  16. û®˛ û©9 Kˇ˙Ω8 8Ä0πˇˇ0ÿˇˇ8‡ò99 Kˇ˙ù8 8Ä0πˇˇ0ÿñ8‡ò99 Kˇ˙}8 8Ä0πˇˇ8ÿ8‡9ó9 Kˇ˙]8 8Ä0πñ8ÿ8‡9ó9 Kˇ˙=:‡ñûÇæ2˜ˇˇ8 8Ä|π∫ï ∑ñVÏ<|’bÆ|ÿ28‡99 Kˇ˘˝/@˙ˇ»Ä`Ä!|¶∫°ˇ‘O‡ |¶ø°ˇÙêî!ˇ∞;·8êA;√;†Äbˇ¯ÄBˇ»HÄA;£ùûIJê˝ÅëùûÅ>ë=8}C‡‡Ä Ä!|¶ª°ˇÙO‡ |¶øaˇÏêî!ˇ®;·8êA;√;Ñ;•;`Å^ˇ¸Åbˇ¯ÅäˇÙlX;~ÄbˇÙÄùˇÙÑ@˛0Ä¢ˇÙÄ›ˇÙf(õĸÅ|á@@Ê 8{Kˇ˙C‡ Å"ˇÅ]ˇÙ
  17. H@˙8ÅbˇÅùˇÙlXõÄ|ÄõÉ @˛8{®ú®ºKˇ˙ŸC‡‹Ä¢ˇ‡Ä≈ˇ¸Ä˝ˇÙ|á0@Ê0Åˇ‡Å(ˇ¸Å]ˇÙjH8{®ú®º®‹®¸Kˇ¸C‡úÅbˇÃÅãˇÙÄ}ˇÙ`@˙$ÄǡÃħˇÙÄ›ˇÙf(8{Kˇ˛aê|C‡hÄ‚ˇÃÅˇ‰Å=ˇÙâ@@˛TÅBˇÃÅjˇ‰ÅùˇÙlX®|,É@Ê8ÄǡÃ8d,Ä¢ˇÃÄÖˇËĬˇÃ8¶ Ä‚ˇÃÄ«ˇÏ®¸©ÄBˇÃHÄAÄ(Ä!|¶ªaˇÏO‡ |¶øÅˇêî!ˇ∞;·8êA;√;§;Ö9±©?/    A˙4©_1jˇˇ±9Äd±ü®0ɡˇ∞ü®ø/Ö@˛ˇÏC‡ˇ»Ä¬T«>,á@Ê(88ü8øÄBˇÏHÄAÅ/@˙ˇ‡Å"1IëBû ΩñW´<û ºñWå<|~ZÆ|ûbÆÉ |†&T£Ô˛C‡‡Ä Ä!|¶ªÅˇO‡ |¶øaˇÏêî!ˇ†;·8êA;√;§;Ö8êû ΩñW¶<~2Æû ΩñWß<û ºñWà<}>BÆ}>;.û ºñWä<~S.Åb1ãëÇìfl≥ø≥ü8ÄǡÄBˇ‹HÄAÄ0Ä!|¶ªaˇÏO‡ |¶ø°ˇÙêî!ˇ∞;·8êA;¿;†ÄbˇÃÄÉdÑħÖĬˇÃÄÊdáÅÅ'|àH@ʆÅBˇÃÅjdãÅã/ A˙ÑÄbˇÃÄÉdÑħÖÄ≈/ÜA˛dÄ‚ˇÃÅdàÅ(âÅIÅjˇ¸Åǡ¯ÄkˇÙ|É`@Ê8ÄǡÃɃdûÉfiûÄæÄ≈ˇ¸Ä‚ˇ¯ÅˇÙh8ÉfiûÉfiC‡åÄBˇÃHÄA;£ùÅ=/    A˙lùÅ]äÅj/ãA˛TùÅùåÄlÄɡ¸Ä¢ˇ¯ÄƒˇÙ|Ü(@Ê0ùÉ›ûIJÅˇ¸Å"ˇ¯ÅHˇÙjHÉfiûÉfi8~C‡‡Ä Ä!|¶ª°ˇÙO‡ |¶ø·ˇ¸êî!ˇ¿;·8êA9`ëb9ÄëÇÄBˇÃHÄAêb ÄÄ!|¶ª·ˇ¸O‡ |¶øÅˇêî!ˇ∞;·8êA;ƒÄÅ0æT¶8|&êÅêA;°8T«Ë˛|ȶ9ˇ¸9!4ÖHÖhïIïiBˇÄBˇÃKˇÙ]ÄA;É8bÅǡ‘Äåˇ–8fi8ΩÄBˇ‘HÄA8bÄǡ‘ÄÑˇ–8¢ˇƒ8¿ÄBˇ‘KˇÛπÄA8bÄ¢ˇ‘ÄÖˇ–Ä¢8¿ÄBˇ‘HÄA8bĬˇ‘Äܡ–8¢ˇ¥8¿ÄBˇ‘KˇÛôÄA8bÄ‚ˇ‘Äáˇ–Ä¢8¿ÄBˇ‘KˇÛyÄA8bÅˇ‘Äàˇ–8¢ˇ®8¿    ÄBˇ‘KˇÛYÄAÅ" }I‡jd9Ä,ãb◊@‡3úˇˇ8bÄǡ‘ÄÑˇ–8†d|º*◊@‡0•ˇˇ8¿ÄBˇ‘KˇÛ9ÄA8bĬˇ‘Äܡ–8†.ÄBˇ‘HÄA8bÄ‚ˇ‘Äᡖ9
  18. }<B◊@‡1)ˇˇ9@
  19. |    R◊|†¶@‡0•
  20. 8¿ÄBˇ‘KˇÚ—ÄA8bÅbˇ‘Äãˇ–9Ä
  21. |b◊|†¶@‡0•
  22. 8¿ÄBˇ‘KˇÚuÄA8bÄǡ‘ÄÑˇ–8¢ˇ†8¿ÄBˇ‘KˇÛÄA8bÄ¢ˇ‘ÄÖˇ–ÄBˇ‘HÄAĬˇÃÄf`ÄÇÄBˇ‘HÄAÄ Ä!|¶ªÅˇO‡ |¶øaˇÏêî!ˇò;·8êA;†;Ä;`Äbˇ¸ÄBˇ»Kˇ˘µÄA;£;¿ñ3fiˇˇù æñW«<›;./@˙ˇËùù9}(9ù9$}    ¶Å Å,ë Ö ï+Å,Bˇë ë+9å9k } $™} %™Äbˇ¯ÄBˇ»KˇÒ≠ÄA;Éú<`8Éêúê\úìºÄ¢ˇÃ®e>8ü8øÄBˇÃHÄA8bˇî8Ä    8¢ˇx8¿ÄBˇ‰HÄA8úĬˇ‰®¶®fl®ˇÄBˇ‡HÄA;cÄ8Ä!|¶ªaˇÏO‡ |¶ø!ˇ‰êî!ˇê;·8êA; ì?Kˇ˙Y;#/ôA˛\;†%3ΩˇˇÄ‚=9(Û|J◊}@¶@‡}JHjAßÅÇ<`8ÉÛ|¨"◊@‡0•ˇˇ≈ ΔX,û@ ì¬C‡<˛Ä9ˇˇëÅ"9@ñ|    R◊}`¶@‡1kñ;ãÅÇ8`ñ|å◊@‡0Ñˇˇ8†ñ|*◊|¿¶@‡0Δñ;fô ºñWá<Y:Æô ºñWà<ô ªñWi<}YJÆ}YC.ô ªñWk<Y[./@˙ˇôô8Ÿ(8˘8`$|i¶ÄgÄáêfÑgîÜÄáBˇêfêÜ8Á8Δ |g$™|f%™ì?8ÄǡÙÄBˇ‹Kˇˆ9ÄAÄ@Ä!|¶ª!ˇ‰O‡ |¶ø¡ˇ¯êî!ˇ∏;·8êA;¿ìflKˇ¯Ω;√/ûA˛hûû9~ˇ¸9û,9$}    ¶Å Å,ë Ö ï+Å,Bˇë ë+9å9k } $™} %™ìfl8ÄǡÙÄBˇ‹KˇÔÄAÄÄ!|¶ª¡ˇ¯O‡ |¶ø°ˇÙêî!ˇ®;·8êA;†ìøKˇ¯;£,ùAÊ@;¿ñ3fiˇˇù æñW√< ûï|ù./@˙ˇ‰ìø8ÄǡÙÄBˇ‹KˇÓmÄAÄ(Ä!|¶ª°ˇÙO‡ |¶øAˇËêî!ˇ†;·8êA;@ì_ Kˇ˜ï;C/öA˛;¿ñ3fiˇˇö æñW≈<⁄+.,û@ÊˇË;¿J;æ/ï@¯®3Ω|fiÍ|‹pö ΩñWß<z:Æö ΩñW®<ö ºñWâ<}ZJÆ}ZC.ö ºñWã<z[./û@˝P3fiˇˇ}ûÍ}úpö æñW√<zÆö æñWƒ<ö ºñWÖ<|⁄*Æ|⁄#.ö ºñWá<z;.C‡ˇXì_ 8 ÄǡÙÄBˇ‹KˇÌÌÄAÄ0Ä!|¶ªAˇËO‡ |¶øÅˇ}&êëî!ˇ®;·8êA;ÄKˇˆa;É,úAÊ`Kˇ˜Â;†ñN`Ç;¿Ë@¯88|8û0æˇˇKˇÙë/ÉA˛8|8û0æˇˇKˇıiN`B3fiC‡ˇ»AÛˇº8bˇh8ÄKˇ˜ŸÄ(Å?$Ä!|¶}/Ò ªÅˇO‡ |¶øaˇÏêî!ˇ†;·8êA;`KˇıΩ;c,õAÊtKˇ˜A;¿/ñ@¯X;û3æ/ùñ@¸(8{8ù8ºKˇÛÂ,ÉAÊ;ù3ΩC‡ˇÿ‡A˙8{8û8ºKˇÙ©3fiC‡ˇ®8bˇT8ÄKˇ˜!Ä0Ä!|¶ªaˇÏO‡ |¶øAˇËêî!ˇ†;·8êA;@Kˇı;C/öA˛êKˇˆë;¿,ûñ@‰t;†;û‡A˙8}]‚}[p8z8û8ªKˇÛ-!c/ãA˛ 3ªC‡;õC‡ˇ»;~|õ‡@Â8z0õˇˇ8ªKˇÛÂ3{ˇˇC‡ˇ‰3fiC‡ˇå8bˇD8ÄKˇˆUÄ0Ä!|¶ªAˇËO‡ |¶øaˇÏêî!ˇ†;·8êA;`KˇÙA;c/A˙òKˇı≈;¿;Ä/ûñ@¸Wfi<Wå<3åC‡ˇÏ,úAÊ`;‹/ñ@¯Hº/ùA¸48{|ù‚8ΩKˇÚE,ÉAÊ8{8ù|Ω‚KˇÛºËC‡ˇÃ3fiC‡ˇ∏0|ˇˇ||pC‡ˇ†8bˇ48ÄKˇıÅÄ0Ä!|¶ªaˇÏO‡ |¶øAˇËêî!ˇ†;·@êA;√;§ëˇ¸Ë@¯ƒ;û;}|ûÍ|öpÄøˇ¸Äe8ú8∫KˇÒ°/ÉA˛ 3úC‡ˇ‡Äflˇ¸Äf8ö8ªKˇÒ},ÉAÊ 3{ˇˇC‡ˇ‡ÿA˘<ö‡@˛ ;[C‡|öÿ@Ê;\ġˇ¸Äg8ú8ªKˇÚ%3ú3{ˇˇÿ@˘ˇt8~8õÅˇ¸Kˇˇ)8|8ùÅˇ¸KˇˇÄ(Ä!|¶ªAˇËO‡ |¶ø·ˇ¸êî!ˇ∏;·8êA8êKˇÚiêÅ/àA˛$KˇÛÈ8`8Äï9Kˇ˛Ω8bˇ$8ÄKˇÙÄÄ!|¶ª·ˇ¸O‡ |¶øaˇÏêî!ˇ†;·@êA;√;§ëˇ¸;ûW…<3i1[|äË@‰$Åˇ¸Äk8õ0ªKˇ9/A˙3{õË@¸tÅüˇ¸Äl8õ8ºKˇ c,ÉAÊTÄüˇ¸Äd8ú8ªKˇ·;õWe<3e0€Ë@¯$ġˇ¸Äg8õ0ªKˇÔ≈/ÉA˛3{C‡ˇåÄ(Ä!|¶ªaˇÏO‡ |¶ø°ˇÙêî!ˇ∞;·8êA8êKˇÒêÅ,àAÊlKˇÚô;¿K;†ñ/@˘3fiˇˇ8~8ù9Kˇ˛¡C‡ˇ‰/ù@˝,3ΩˇˇÄ8Ä8ΩKˇ8`8ù9Kˇ˛ëC‡ˇ‘8bˇ8ÄKˇÚÅÄ Ä!|¶ª°ˇÙO‡ øÅˇî!ˇ®;·@;√;§ëˇ¸´û©>©]}iR1ã±û≥ùÄ!ªÅˇO‡ øÅˇî!ˇ®;·@;√;§ëˇ¸´ù®}®û|£ 0≈ˇˇ∞›≥ûÄ!ªÅˇO‡ |¶ø°ˇÙêî!ˇ®;·@êA;√∞ü4∞ø8롸®ˇ4,áA‰ò©4}(©_8©RÅˇ¸Äk 8ù0æˇˇKˇÓ/A˙3æˇˇ848ü8Åˇ¸KˇˇQÅüˇ¸Äl 8û8ΩKˇÌÈ/ÉA˛0ġ¸Äc 8û8ΩKˇÓΩ;›848ü8Åˇ¸KˇˇC‡ 8Ä∞ü4C‡ˇdÄ Ä!|¶ª°ˇÙO‡ |¶øaˇÏêî!ˇ†;·@êA;√;§∞ø@∞flD롸,ù@Â8W•¯@‚Ωp8@8üDÅˇ¸Kˇ˛YC‡ˇ‰®fl@f/A˙$ġˇ¸Äg 8û8ªKˇÌ!/àA˛ ;†C‡‹3Ωˇˇ©?@,â@Ê Å_ˇ¸Äj 8û8ªKˇÌ’;€C‡∞©@}ã®DåÄüˇ¸Äd 8ú0æˇˇKˇÏπ/A˙3ûˇˇ8@8üDÅˇ¸Kˇ˝ÒWΩ<Äøˇ¸Äe 8õ8ºKˇÏÖ √/ÜA˛ Äˇˇ¸Äg 8û8ªKˇÌU;€C‡0Åˇ¸Äh 8û8ºKˇÌ9;‹8@8üDÅˇ¸Kˇ˝â;†C‡˛»8~®ü@®øDÅˇ¸Kˇ˝≠Ä(Ä!|¶ªaˇÏO‡ |¶øAˇËêî!ˇ†;·@êA;√;§;Ö;f롸[Å?ˇ¸Äi 8û8∫KˇÎ¡,ÉAÊ0Å_ˇ¸Äj 8û8∫KˇÏï8z8ù8º8€Åˇ¸Kˇ˝˝Ä(Ä!|¶ªAˇËO‡ |¶øÅˇêî!ˇ®;·8êA8ê KˇÏÒê Å / A˙ÏKˇÓq;¿;†;Ä9ıü8`∞/ûñA˛ÿWÑ~,Ñ@ÊD8}®ü®ø9Kˇ¸ë0º|ºp88ü9Kˇ˚˘88ü9Kˇ˚ÈC‡Ä®fl|˛2/ñ@¯8}®ü®ø9Kˇ¸AC‡8}8ú®ø®fl9Kˇ˝88ü9Kˇ˚’Wú<©/àA˛88ü9Kˇ˚µWú<C‡ˇ‡3ú3fi3ΩC‡ˇ(8}8ú®ø®fl9Kˇ¸°,ûAʃ3fiˇˇ3úˇˇ©?/    @˙,3ΩˇˇWä¯@‚úp88ü9Kˇ˚    C‡ˇ‰C‡Ñ©}ãË®¨/ú@˝8}8ú®ø®fl9Kˇ˝Ω88ü9Kˇ˚WÑ<3Ñ®øΩ*8}8ú®ø®fl9Kˇ˝Ö88ü9Kˇ˙…WÜ<3ÜC‡ˇ<8bˇ8ÄKˇÏŸÄ(Ä!|¶ªÅˇO‡ |¶ø·ˇ¸êî!ˇ¿;·8êAÄBˇÃKˇÛ›ÄAêb8bÄ‚ˇ‘ÄᡖÄBˇ‘HÄAÄÄ!|¶ª·ˇ¸O‡ âXˇ¸ˇˇˇˇDataDescˇ¯ˇÙFrameDescˇÙˇ¯ReorderMsgˇˇ¯SwapMsgäLNPRW_bcjtw{|îñòöüß™´≥µ∂ªΩæ¬À‘›˝ˇ $'+/13;>?HJLNsyzñóúù¢µΩæÃÕflÔ¸<=?@HYZ]^`aefÉÖàèïóùü®™Ø±∏ºæ¬ƒÀÕ“‘ÿöõ†°∏Ω$%NOz{öõß®´¨ÆØ≥¥ºΩ¿¡√ƒ»…㯃¿8ReplConstaÁ{col·{fthÂ{modeÊ{w‰{x‚{y„{¯ã08UpdateReorderdataÊ{|f·{xiÂ{left‚{x0„{y0‰{¯Î¿8UpdateSwapf·{xi‚{j„{left‰{x0Â{xiÁ{xjÈ{y0Ê{yiË{yjÍ{¯âÿ8ModifyclipFrame tdataÍ{|dy„{f·{xhÂ{iË{id‚{leftÈ{x0Ê{y‰{y0Á{¯®8CopyOfc‚{xf·{x¯í 8Handlerf·{tm„{xself‰{x¯Œ8Lessdata·{|i‚{j„{keys    xy¯˘(8Swapdata·{|i‚{j„{msgpx‰{¯fi8ParameterDatal·{|v‚{|¯Ò8Start¯ä8Stopname‚{t„{¯€08Opendata‚{|f„{xi·{v‰{xxy¯¬88RandomizedataÊ{|i·{k„{l‰{msgtn‚{xÂ{¯Ï8Recalldata·{|msgt¯å     8ReverseOrderdata‚{|i·{msgt¯ÿ    (8QuickWorstOrderdataÂ{|i·{j‚{m„{msg tx‰{¯É
  23.  8Bubbledata„{|i·{n‚{swappedå{¯Ø
  24. (8MinSearchdata‰{|i·{j‚{min„{¯‚
  25. (8InsertdataÂ{|hi„{i·{lo‚{m‰{¯ó (8Shelldata‰{|h„{i·{j‚{¯◊  ¿Sorthi‚{i„{j‰{lo·{mÂ{¯Ò 8Quickdata|¯´  ¿Sifti„{j‰{l·{r‚{¯◊ 8Heapdata|l·{r‚{¯Á ¿Upb·{b1„{c‚{¯˜ ¿Downb·{c‚{c1„{¯Æ¿Siftb4c8r·{r1‚{¯í ¿Trinkleb¿cƒp‚{r·{r1„{r2‰{¯µ ¿SemiTrinkleb„{c‰{p‚{r·{r1Â{¯¡ 8Smoothbcdata |p„{q·{r‚{¯÷8$$comparisonsseedswapstime wP˜DataDesclistñlastRandom¨ñ˜FrameDescdata|˜ReorderMsgdata|˜SwapMsgdata|ij